home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 2002 #11 / Amiga Plus CD - 2002 - No. 11.iso / Tools / Development / PowerD / powerd / modules.lha / modules / graphics / copper.m < prev    next >
Encoding:
Text File  |  2002-01-01  |  1.2 KB  |  65 lines
  1. MODULE 'graphics/monitor','graphics/view','utility/tagitem'
  2.  
  3. CONST    COPPER_MOVE=0,
  4.         COPPER_WAIT=1,
  5.         CPRNXTBUF=2,
  6.         CPR_NT_LOF=$8000,
  7.         CPR_NT_SHT=$4000,
  8.         CPR_NT_SYS=$2000
  9.  
  10. OBJECT CopIns
  11.     OpCode:WORD,
  12. // a) next two WORDs are unioned with "nxtlist:PTR TO coplist"
  13.     VWaitPos|DestAddr:WORD,
  14.     HWaitPos|DestData:WORD
  15.  
  16. #define VWAITPOS vwaitpos
  17. #define DESTADDR vwaitpos
  18. #define HWAITPOS hwaitpos
  19. #define DESTDATA hwaitpos
  20.  
  21. OBJECT CprList|cprlist
  22.     Next:PTR TO cprlist,
  23.     start:PTR TO UWORD,
  24.     MaxCount:WORD
  25.  
  26. OBJECT CopList
  27.     Next:PTR TO CopList,
  28.     _CopList:PTR TO CopList,
  29.     _ViewPort:PTR TO ViewPort,
  30.     CopIns:PTR TO CopIns,
  31.     CopPtr:PTR TO CopIns,
  32.     CopLStart:PTR TO UWORD,
  33.     CopSStart:PTR TO UWORD,
  34.     Count:WORD,
  35.     MaxCount:WORD,
  36.     DyOffset:WORD,
  37.   Cop2Start:PTR TO UWORD,
  38.   Cop3Start:PTR TO UWORD,
  39.   Cop4Start:PTR TO UWORD,
  40.   Cop5Start:PTR TO UWORD,
  41.   SLRepeat:UWORD,
  42.     Flags:UWORD
  43.  
  44. CONST    EXACT_LINE=1,
  45.         HALF_LINE=2
  46.  
  47. OBJECT UCopList
  48.     Next:PTR TO UCopList,
  49.     FirstCopList:PTR TO CopList,
  50.     CopList:PTR TO CopList
  51.  
  52. OBJECT CopInit|copinit
  53.     vsync_hblank[2]:UWORD,
  54.     diagstrt[12]:UWORD,
  55.     fm0[2]:UWORD,
  56.     diwstart[10]:UWORD,
  57.     bplcon2[2]:UWORD,
  58.     sprfix[16]:UWORD,
  59.     sprstrtup[32]:UWORD,
  60.     wait14[2]:UWORD,
  61.     norm_hblank[2]:UWORD,
  62.     jump[2]:UWORD,
  63.     wait_forever[6]:UWORD,
  64.     sprstop[8]:UWORD
  65.